﻿Public Class frmreservacion
    Inherits Windows.Forms.Form
    Dim arreglonombre(20) As String
    Dim i As Integer = 0

    Private Sub btnagregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnagregar.Click
        If lsbnombre.Items.Count = i Then

            i = i + 1
        End If
        btnagregar.Enabled = False
        Button3.Enabled = True
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Visible = False
        fORMULARIO_Restaurante.Visible = True
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Visible = False
        frmimprimir.Visible = True
    End Sub

    Private Sub frmreservacion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Button3.Enabled = False
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        btnagregar.Enabled = True
        txtNpersonas.Text = ""
    End Sub
End Class